object LabelDlg: TLabelDlg Left = 160 Top = 96 ActiveControl = LoadBtn BorderStyle = bsDialog Caption = 'Print Labels' ClientHeight = 337 ClientWidth = 368 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] PixelsPerInch = 96 ShowHint = True OnCreate = FormCreate OnDestroy = FormDestroy TextHeight = 13 object ButtonPanel: TPanel Left = 283 Top = 0 Width = 85 Height = 283 Align = alRight BevelOuter = bvNone Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 object PrintBtn: TBitBtn Left = 5 Top = 79 Width = 77 Height = 27 Hint = 'Print Report On Selected Printer' Caption = '&Print' Default = True TabOrder = 2 OnClick = PrintBtnClick Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000 0003377777777777777308888888888888807F33333333333337088888888888 88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F 8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F 8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF 03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF 03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0 33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033 33333337FFFF77333333333000000333333333377777733333330000} Margin = 2 NumGlyphs = 2 Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 5 Top = 1 Width = 77 Height = 27 Hint = 'Close This Window' Caption = '&Close' TabOrder = 0 Kind = bkCancel Margin = 2 Spacing = -1 IsControl = True end object HelpBtn: TBitBtn Left = 5 Top = 40 Width = 77 Height = 27 Hint = 'Display Help Window' TabOrder = 1 Kind = bkHelp Margin = 2 Spacing = -1 IsControl = True end object LoadBtn: TBitBtn Left = 5 Top = 157 Width = 77 Height = 27 Hint = 'Load Report Template From Disk File' Caption = '&Load' Default = True TabOrder = 4 OnClick = LoadBtnClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF 07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF 0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0 33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333 3BB33773333773333773B333333B3333333B7333333733333337} Margin = 2 NumGlyphs = 2 Spacing = -1 IsControl = True end object SaveBtn: TBitBtn Left = 5 Top = 196 Width = 77 Height = 27 Hint = 'Save Report Template To Disk File' Caption = '&Save' Default = True TabOrder = 5 OnClick = SaveBtnClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070 7700333333337777777733333333008088003333333377F73377333333330088 88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000 000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039 99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999 93337FFFF7737777733300000033333333337777773333333333} Margin = 2 NumGlyphs = 2 Spacing = -1 IsControl = True end object PreviewBtn: TBitBtn Left = 5 Top = 118 Width = 77 Height = 27 Hint = 'Preview Report On Screen' Caption = 'Pre&view' Default = True TabOrder = 3 OnClick = PreviewBtnClick Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000 033333777777777773333330777777703333333773F333773333333330888033 33333FFFF7FFF7FFFFFF0000000000000003777777777777777F0FFFFFFFFFF9 FF037F3333333337337F0F78888888887F037F33FFFFFFFFF37F0F7000000000 8F037F3777777777F37F0F70AAAAAAA08F037F37F3333337F37F0F70ADDDDDA0 8F037F37F3333337F37F0F70A99A99A08F037F37F3333337F37F0F70A99A99A0 8F037F37F3333337F37F0F70AAAAAAA08F037F37FFFFFFF7F37F0F7000000000 8F037F3777777777337F0F77777777777F037F3333333333337F0FFFFFFFFFFF FF037FFFFFFFFFFFFF7F000000000000000377777777777777730000} Margin = 2 NumGlyphs = 2 Spacing = -1 IsControl = True end end object TabSet: TTabSet Left = 0 Top = 316 Width = 368 Height = 21 Align = alBottom Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OnClick = TabSetClick end object Notebook: TNotebook Left = 0 Top = 0 Width = 283 Height = 283 Align = alClient TabOrder = 2 IsControl = True object TPage Left = 0 Top = 0 Caption = 'Fields' IsControl = True object GroupBox1: TGroupBox Left = 3 Top = 4 Width = 277 Height = 275 Caption = 'Data Fields' TabOrder = 0 object Label1: TLabel Left = 5 Top = 18 Width = 56 Height = 13 Caption = 'All Fields:' end object Label2: TLabel Left = 157 Top = 18 Width = 91 Height = 13 Caption = 'Included Fields:' end object IncludeBtn: TSpeedButton Left = 126 Top = 52 Width = 24 Height = 24 Hint = 'Include Selected Field' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] Glyph.Data = { 74010000424D7401000000000000760000002800000013000000130000000100 040000000000E400000000000000000000000000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888FFFFF8888888888888888888000108888888888888888888FFFF58888 880088888888888000008888880A08888888888FFFFF8888880AA08888888880 00008888880AAA088888888FFFFF8888880AAAA08888888000008888880AAAAA 0888888131008888880AAAAAA088888095C08888880AAAAA0888888053028888 880AAAA088888887D5D58888880AAA0888888889091D8888880AA0888888888F CFD78888880A08888888888A7AE288888800888888888887CF57888888888888 88888881F9758888888888888888888AFBAF8888888888888888888E666C0000 000000000000000000000000000000000000000000000000} ParentFont = False ParentShowHint = False ShowHint = True OnClick = IncludeBtnClick IsControl = True end object IncAllBtn: TSpeedButton Left = 125 Top = 81 Width = 24 Height = 24 Hint = 'Include All Fields' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] Glyph.Data = { 74010000424D7401000000000000760000002800000013000000130000000100 040000000000E400000000000000000000000000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888FFFFF8888888888888888888000108888888888888888888FFFF58008 8888880088888880000080A08888880A0888888FFFFF80AA0888880AA0888880 000080AAA088880AAA08888FFFFF80AAAA08880AAAA08880000080AAAAA0880A AAAA0881310080AAAAAA080AAAAAA08095C080AAAAA0880AAAAA0880530280AA AA08880AAAA08887D5D580AAA088880AAA088889091D80AA0888880AA088888F CFD780A08888880A0888888A7AE280088888880088888887CF57888888888888 88888881F9758888888888888888888AFBAF8888888888888888888E666C0000 000000000000000000000000000000000000000000000000} ParentFont = False ParentShowHint = False ShowHint = True OnClick = IncAllBtnClick IsControl = True end object ExcludeBtn: TSpeedButton Left = 125 Top = 125 Width = 24 Height = 24 Hint = 'Exclude Selected Field' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] Glyph.Data = { 74010000424D7401000000000000760000002800000013000000130000000100 040000000000E400000000000000000000000000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888FFFFF8888888888888888888000108888888888888888888FFFF58888 888888800888888000008888888888090888888FFFFF88888888809908888880 00008888888809990888888FFFFF888888809999088888800000888888099999 0888888131008888809999990888888095C08888880999990888888053028888 8880999908888887D5D588888888099908888889091D8888888880990888888F CFD78888888888090888888A7AE288888888888008888887CF57888888888888 88888881F9758888888888888888888AFBAF8888888888888888888E666C0000 000000000000000000000000000000000000000000000000} ParentFont = False ParentShowHint = False ShowHint = True OnClick = ExcludeBtnClick IsControl = True end object ExAllBtn: TSpeedButton Left = 125 Top = 154 Width = 24 Height = 24 Hint = 'Exclude All Fields' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] Glyph.Data = { 74010000424D7401000000000000760000002800000013000000130000000100 040000000000E400000000000000000000000000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888FFFFF8888888888888888888000108888888888888888888FFFF58888 888008888888008000008888880908888880908FFFFF88888099088888099080 00008888099908888099908FFFFF888099990888099990800000880999990880 9999908131008099999908099999908095C08809999908809999908053028880 9999088809999087D5D588880999088880999089091D8888809908888809908F CFD78888880908888880908A7AE288888880088888880087CF57888888888888 88888881F9758888888888888888888AFBAF8888888888888888888E666C0000 000000000000000000000000000000000000000000000000} ParentFont = False ParentShowHint = False ShowHint = True OnClick = ExAllBtnClick IsControl = True end object MoveUpBtn: TSpeedButton Left = 184 Top = 246 Width = 24 Height = 24 Hint = 'Move Up' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333 3333333333777F33333333333309033333333333337F7F333333333333090333 33333333337F7F33333333333309033333333333337F7F333333333333090333 33333333337F7F33333333333309033333333333FF7F7FFFF333333000090000 3333333777737777F333333099999990333333373F3333373333333309999903 333333337F33337F33333333099999033333333373F333733333333330999033 3333333337F337F3333333333099903333333333373F37333333333333090333 33333333337F7F33333333333309033333333333337373333333333333303333 333333333337F3333333333333303333333333333337333333330000} NumGlyphs = 2 ParentFont = False ParentShowHint = False ShowHint = True OnClick = MoveUpBtnClick IsControl = True end object MoveDownBtn: TSpeedButton Left = 216 Top = 246 Width = 24 Height = 24 Hint = 'Move Down' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333 333333333337F33333333333333033333333333333373F333333333333090333 33333333337F7F33333333333309033333333333337373F33333333330999033 3333333337F337F33333333330999033333333333733373F3333333309999903 333333337F33337F33333333099999033333333373333373F333333099999990 33333337FFFF3FF7F33333300009000033333337777F77773333333333090333 33333333337F7F33333333333309033333333333337F7F333333333333090333 33333333337F7F33333333333309033333333333337F7F333333333333090333 33333333337F7F333333333333000333333333333377733333330000} NumGlyphs = 2 ParentFont = False ParentShowHint = False ShowHint = True OnClick = MoveDownBtnClick IsControl = True end object ListBox1: TListBox Left = 5 Top = 34 Width = 113 Height = 231 Hint = 'List Of All Data Fields' ItemHeight = 13 TabOrder = 0 end object ListBox2: TListBox Left = 158 Top = 34 Width = 113 Height = 207 Hint = 'Data Fields Selected For Report' ItemHeight = 13 TabOrder = 1 end end end object TPage Left = 0 Top = 0 Caption = 'Labels' object GroupBox5: TGroupBox Left = 3 Top = 1 Width = 277 Height = 275 Caption = 'Label Settings' TabOrder = 0 object Label7: TLabel Left = 212 Top = 216 Width = 58 Height = 26 Caption = 'Print From Label #:' WordWrap = True end object GroupBox2: TGroupBox Left = 8 Top = 104 Width = 201 Height = 42 Caption = 'Label Size [inches]' TabOrder = 1 object Label3: TLabel Left = 10 Top = 19 Width = 38 Height = 13 Caption = 'Width:' end object Label4: TLabel Left = 101 Top = 19 Width = 42 Height = 13 Caption = 'Height:' end object WidthEd: TEdit Left = 48 Top = 16 Width = 49 Height = 20 Hint = 'Label Width' TabOrder = 0 OnKeyPress = LeftEdKeyPress end object HeightEd: TEdit Left = 143 Top = 16 Width = 49 Height = 20 Hint = 'Label Height' TabOrder = 1 OnKeyPress = LeftEdKeyPress end end object GroupBox3: TGroupBox Left = 8 Top = 14 Width = 257 Height = 90 Caption = 'Label Type' TabOrder = 0 object LabelType: TRadioGroup Left = 8 Top = 13 Width = 129 Height = 44 ItemIndex = 0 Items.Strings = ( 'Avery' 'Custom') TabOrder = 0 OnClick = LabelTypeClick end object AveryType: TComboBox Left = 8 Top = 61 Width = 129 Height = 21 Hint = 'AVERY Label Type' ItemHeight = 13 Items.Strings = ( 'AV 12_294' 'AV 12_295' 'AV 12_296' 'AV 12_297' 'AV 2160' 'AV 2162' 'AV 2163' 'AV 2180' 'AV 2181' 'AV 2186' 'AV 2660' 'AV 2662' 'AV 2663' 'AV 5066' 'AV 5095' 'AV 5096' 'AV 5097' 'AV 5160' 'AV 5161' 'AV 5162' 'AV 5163' 'AV 5164' 'AV 5165' 'AV 5167' 'AV 5196' 'AV 5197' 'AV 5198' 'AV 5199 FACE' 'AV 5199 SPINE' 'AV 5260' 'AV 5261' 'AV 5262' 'AV 5263' 'AV 5264' 'AV 5265' 'AV 5266' 'AV 5267' 'AV 5293' 'AV 5294' 'AV 5295' 'AV 5305' 'AV 5309' 'AV 5315' 'AV 5361' 'AV 5361 SINGLE' 'AV 5362' 'AV 5362 SINGLE' 'AV 5364' 'AV 5364S' 'AV 5366' 'AV 5371' 'AV 5372' 'AV 5376' 'AV 5377' 'AV 5383' 'AV 5384' 'AV 5385' 'AV 5386' 'AV 5388' 'AV 5389' 'AV 5390' 'AV 5392' 'AV 5395' 'AV 5660' 'AV 5661' 'AV 5662' 'AV 5663' 'AV 5664' 'AV 5667' 'AV 5766' 'AV 5824' 'AV 5836 LABEL' 'AV 5836 TAB' 'AV 5837 LABEL' 'AV 5837 TAB' 'AV 5838 LABEL' 'AV 5838 TAB' 'AV 5839' 'AV 5840' 'AV 5841' 'AV 5842' 'AV 5843' 'AV 5844' 'AV 5845' 'AV 5848 LABEL' 'AV 5848 TAB' 'AV 5849 LABEL' 'AV 5849 TAB' 'AV 5855 LABEL' 'AV 5855 TAB' 'AV 5866' 'AV 5883' 'AV 5895 BADGE' 'AV 5895 SPINE' 'AV 5896' 'AV 5897' 'AV 5911' 'AV 5920' 'AV 5922' 'AV 5923' 'AV 5927' 'AV 5930' 'AV 5932' 'AV 5963' 'AV 5966' 'AV 6460' 'AV 6464' 'AV 6466' 'AV 6490' 'AV 8160' 'AV 8161' 'AV 8162' 'AV 8163' 'AV 8164' 'AV 8165' 'AV 8166' 'AV 8167' 'AV 8196' 'AV 8315' 'AV 8316 LANDSCAPE' 'AV 8316 PORTRAIT' 'AV 8371' 'AV 8372' 'AV 8376' 'AV 8377' 'AV 8460' 'AV 8462' 'AV 8463' 'AV 8660' 'AV 8662' 'AV 8663' 'AV 8920' 'AV 8922' 'AV 8923' 'AV 8927' 'AV 8930' 'AV 8932') Sorted = True TabOrder = 1 OnChange = AveryTypeChange end object LabelShape: TRadioGroup Left = 144 Top = 13 Width = 105 Height = 70 Caption = 'Shape' ItemIndex = 0 Items.Strings = ( 'Round Rect.' 'Rectangle' 'Round') TabOrder = 2 end end object GroupBox6: TGroupBox Left = 8 Top = 229 Width = 201 Height = 42 Caption = 'Number Of Labels On One Page' TabOrder = 4 object Label5: TLabel Left = 5 Top = 19 Width = 43 Height = 13 Caption = 'Across:' end object Label6: TLabel Left = 105 Top = 19 Width = 37 Height = 13 Caption = 'Down:' end object NumAcross: TEdit Left = 48 Top = 16 Width = 49 Height = 20 Hint = 'Number Of Labels Horizontally' TabOrder = 0 OnKeyPress = NumAcrossKeyPress end object NumDown: TEdit Left = 143 Top = 16 Width = 49 Height = 20 Hint = 'Number Of Labels Vertically' TabOrder = 1 OnKeyPress = NumAcrossKeyPress end end object GroupBox7: TGroupBox Left = 8 Top = 146 Width = 201 Height = 42 Caption = 'Gaps [inches]' TabOrder = 2 object Label8: TLabel Left = 15 Top = 19 Width = 32 Height = 13 Caption = 'Vert.:' end object Label9: TLabel Left = 105 Top = 19 Width = 38 Height = 13 Caption = 'Horiz.:' end object SpaceW: TEdit Left = 48 Top = 16 Width = 49 Height = 20 Hint = 'Vertical Gaps Between Two Adjoining Labels' TabOrder = 0 OnKeyPress = LeftEdKeyPress end object SpaceH: TEdit Left = 143 Top = 16 Width = 49 Height = 20 Hint = 'Horizontal Gaps Between Two Adjoining Labels' TabOrder = 1 OnKeyPress = LeftEdKeyPress end end object GroupBox8: TGroupBox Left = 8 Top = 188 Width = 201 Height = 42 Caption = 'Page Margins [inches]' TabOrder = 3 object Label13: TLabel Left = 21 Top = 19 Width = 27 Height = 13 Caption = 'Left:' end object Label14: TLabel Left = 116 Top = 19 Width = 27 Height = 13 Caption = 'Top:' end object SpaceL: TEdit Left = 48 Top = 16 Width = 49 Height = 20 Hint = 'Distance From Paper Edge To Left Edge Of First Label' TabOrder = 0 OnKeyPress = LeftEdKeyPress end object SpaceT: TEdit Left = 143 Top = 16 Width = 49 Height = 20 Hint = 'Distance From Paper Edge To Top Edge Of First Label' TabOrder = 1 OnKeyPress = LeftEdKeyPress end end object FromLabelEd: TEdit Left = 224 Top = 245 Width = 34 Height = 20 Hint = 'First Label To Be Printed On First Page' TabOrder = 5 OnKeyPress = NumAcrossKeyPress end end end object TPage Left = 0 Top = 0 Caption = 'Body' object GroupBox9: TGroupBox Left = 3 Top = 4 Width = 277 Height = 275 Caption = 'Label Body' TabOrder = 0 object GroupBox11: TGroupBox Left = 8 Top = 20 Width = 225 Height = 44 Caption = 'Body Text Margins [inches]' TabOrder = 0 object Label18: TLabel Left = 14 Top = 20 Width = 27 Height = 13 Caption = 'Left:' end object Label19: TLabel Left = 109 Top = 20 Width = 27 Height = 13 Caption = 'Top:' end object LabelLM: TEdit Left = 41 Top = 17 Width = 49 Height = 20 Hint = 'Label Body Text Left Margin' TabOrder = 0 OnKeyPress = LeftEdKeyPress end object LabelTM: TEdit Left = 136 Top = 17 Width = 49 Height = 20 Hint = 'Label Body Text Top Margin' TabOrder = 1 OnKeyPress = LeftEdKeyPress end end object GroupBox10: TGroupBox Left = 8 Top = 72 Width = 225 Height = 193 Caption = 'Text Font' TabOrder = 1 object Label10: TLabel Left = 16 Top = 16 Width = 66 Height = 13 Caption = 'Font Name:' end object Label11: TLabel Left = 16 Top = 56 Width = 62 Height = 13 Caption = 'Font Style:' end object Label12: TLabel Left = 16 Top = 104 Width = 58 Height = 13 Caption = 'Font Size:' end object FontEd: TEdit Left = 16 Top = 32 Width = 185 Height = 20 TabStop = False Color = clBtnFace ReadOnly = True TabOrder = 0 end object StyleEd: TEdit Left = 16 Top = 72 Width = 185 Height = 20 TabStop = False Color = clBtnFace ReadOnly = True TabOrder = 1 end object SizeEd: TEdit Left = 16 Top = 120 Width = 185 Height = 20 TabStop = False Color = clBtnFace ReadOnly = True TabOrder = 2 end object FontBtn: TBitBtn Left = 50 Top = 152 Width = 113 Height = 33 Hint = 'Select Font' Caption = 'Change Font' TabOrder = 3 OnClick = FontBtnClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333333FFF33FFFFF33333300033000 00333337773377777333333330333300033333337FF33777F333333330733300 0333333377FFF777F33333333700000073333333777777773333333333033000 3333333337FF777F333333333307300033333333377F777F3333333333703007 33333333377F7773333333333330000333333333337777F33333333333300003 33333333337777F3333333333337007333333333337777333333333333330033 3333333333377333333333333333033333333333333733333333333333333333 3333333333333333333333333333333333333333333333333333} Margin = 5 NumGlyphs = 2 end end end end object TPage Left = 0 Top = 0 Caption = 'Header/Footer' object GroupBox4: TGroupBox Left = 3 Top = 4 Width = 277 Height = 275 Caption = 'Label Header/Footer' TabOrder = 0 object Label15: TLabel Left = 8 Top = 14 Width = 117 Height = 13 Caption = 'Header/Footer Text:' end object GroupBox12: TGroupBox Left = 8 Top = 135 Width = 257 Height = 135 Caption = 'Header/Footer Font' TabOrder = 2 object Label16: TLabel Left = 10 Top = 20 Width = 66 Height = 13 Caption = 'Font Name:' end object Label17: TLabel Left = 10 Top = 44 Width = 62 Height = 13 Caption = 'Font Style:' end object Label20: TLabel Left = 10 Top = 70 Width = 58 Height = 13 Caption = 'Font Size:' end object HFFontEd: TEdit Left = 80 Top = 17 Width = 169 Height = 20 TabStop = False Color = clBtnFace ReadOnly = True TabOrder = 0 end object HFStyleEd: TEdit Left = 80 Top = 42 Width = 169 Height = 20 TabStop = False Color = clBtnFace ReadOnly = True TabOrder = 1 end object HFSizeEd: TEdit Left = 80 Top = 67 Width = 169 Height = 20 TabStop = False Color = clBtnFace ReadOnly = True TabOrder = 2 end object BitBtn1: TBitBtn Left = 105 Top = 93 Width = 113 Height = 33 Hint = 'Select Font' Caption = 'Change Font' TabOrder = 3 OnClick = BitBtn1Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333333FFF33FFFFF33333300033000 00333337773377777333333330333300033333337FF33777F333333330733300 0333333377FFF777F33333333700000073333333777777773333333333033000 3333333337FF777F333333333307300033333333377F777F3333333333703007 33333333377F7773333333333330000333333333337777F33333333333300003 33333333337777F3333333333337007333333333337777333333333333330033 3333333333377333333333333333033333333333333733333333333333333333 3333333333333333333333333333333333333333333333333333} Margin = 5 NumGlyphs = 2 end end object HFText: TMemo Left = 8 Top = 28 Width = 257 Height = 61 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 end object GroupBox13: TGroupBox Left = 8 Top = 93 Width = 257 Height = 39 Caption = 'Header/Footer Margins [inches]' TabOrder = 1 object Label21: TLabel Left = 15 Top = 17 Width = 27 Height = 13 Caption = 'Left:' end object Label22: TLabel Left = 103 Top = 17 Width = 27 Height = 13 Caption = 'Top:' end object HFLeft: TEdit Left = 45 Top = 14 Width = 49 Height = 20 Hint = 'Header/Footer Left Margin' TabOrder = 0 OnKeyPress = LeftEdKeyPress end object HFTop: TEdit Left = 133 Top = 14 Width = 49 Height = 20 Hint = 'Header/Footer Top Margin' TabOrder = 1 OnKeyPress = LeftEdKeyPress end end end end object TPage Left = 0 Top = 0 Caption = 'Logo' object GroupBox14: TGroupBox Left = 3 Top = 4 Width = 277 Height = 275 Caption = 'Logo Settings' TabOrder = 0 object GroupBox15: TGroupBox Left = 8 Top = 133 Width = 257 Height = 44 Caption = 'Logo Position [inches]' TabOrder = 1 object Label24: TLabel Left = 29 Top = 19 Width = 27 Height = 13 Caption = 'Left:' end object Label25: TLabel Left = 117 Top = 19 Width = 27 Height = 13 Caption = 'Top:' end object LogoLEd: TEdit Left = 59 Top = 17 Width = 49 Height = 20 Hint = 'Distance from Label Border to Left Edge of Logo' TabOrder = 0 OnKeyPress = LeftEdKeyPress end object LogoTEd: TEdit Left = 147 Top = 17 Width = 49 Height = 20 Hint = 'Distance from Label Border to Top Edge of Logo' TabOrder = 1 OnKeyPress = LeftEdKeyPress end end object GroupBox16: TGroupBox Left = 8 Top = 24 Width = 257 Height = 97 Caption = 'Logo File' TabOrder = 0 object Label23: TLabel Left = 8 Top = 24 Width = 131 Height = 13 Caption = 'Logo File Name (BMP):' end object LogoFEd: TEdit Left = 8 Top = 40 Width = 233 Height = 20 Hint = 'Logo File Name (must be BMP file)' TabOrder = 0 end object Button1: TButton Left = 88 Top = 66 Width = 81 Height = 25 Hint = 'Select Logo File' Caption = 'Select' TabOrder = 1 OnClick = Button1Click end end end end end object Panel1: TPanel Left = 0 Top = 283 Width = 368 Height = 33 Align = alBottom BevelOuter = bvNone TabOrder = 3 object PreviousBtn: TButton Left = 16 Top = 3 Width = 89 Height = 25 Caption = '<< P&revious' TabOrder = 0 Visible = False OnClick = PreviousBtnClick end object NextBtn: TButton Left = 162 Top = 3 Width = 89 Height = 25 Caption = '&Next >>' TabOrder = 1 OnClick = NextBtnClick end end object FontDialog1: TFontDialog Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] MinFontSize = 0 MaxFontSize = 0 Left = 336 Top = 287 end object ReportSystem1: TReportSystem SystemSetups = [ssAllowCopies, ssAllowCollate, ssAllowDuplex, ssAllowDestPreview, ssAllowDestPrinter, ssAllowDestFile, ssAllowPrinterSetup] SystemFiler.FileName = 'label.tmp' SystemFiler.StatusFormat = 'Generating page %p' SystemFiler.StreamMode = smFile SystemPreview.ZoomFactor = 100.000000000000000000 SystemPrinter.ScaleX = 100.000000000000000000 SystemPrinter.ScaleY = 100.000000000000000000 SystemPrinter.StatusFormat = 'Printing page %p' SystemPrinter.Title = 'Report' SystemPrinter.UnitsFactor = 1.000000000000000000 OnPrint = ReportSystem1Print Left = 299 Top = 287 end object LabelShell1: TLabelShell NumDown = 4 LabelWidth = 2.500000000000000000 LabelHeight = 2.500000000000000000 SpacingLeft = 0.250000000000000000 SpacingTop = 0.500000000000000000 SpacingWidth = 2.750000000000000000 SpacingHeight = 2.500000000000000000 DrawExtents = True LabelShape = lsRound OnReportBefore = LabelShell1ReportBefore OnLabelPrint = LabelShell1LabelPrint OnLabelAfter = LabelShell1LabelAfter OnReportAfter = LabelShell1ReportAfter Left = 259 Top = 287 end object OpenDialog1: TOpenDialog Title = 'Select Logo File' Left = 339 Top = 256 end end